library(ggplot2) library(tidyverse) library(scales) library(plotly) cc_list <- readRDS("comp-comp_covid.rds")
cc_list$Data
ggplotly(cc_list$`Case by region`)
ggplotly(cc_list$`Cases against Death`)